Google
 
Trailing-Edge - PDP-10 Archives - 6.1_emacs_manuals_1er - emacs/auto-save-mode.:ej
There are no other files named auto-save-mode.:ej in the archive.
PW[0 +8+fq(+4)[1
0fo10f"g+q1'
+fq()+4u1
fq1"l 0'
,q1:m(q1+4(]1]0))Qhv=	N
62!^2
;:Ka[h"v#i'<3p>VHUO& Auto Save All Buffers& Auto Save File& Auto Save Setup& Real-time Interrupt& Secretary Macro"& Setup AUTO-SAVE-MODE LibraryAuto Save Mode^R Save File~DIRECTORY~!~DOC~ & Auto Save All Buffers~DOC~ & Auto Save File~DOC~ & Auto Save Setup~DOC~ & Real-time Interrupt~DOC~ & Secretary Macro(~DOC~ & Setup AUTO-SAVE-MODE Library~DOC~ Auto Save Mode~DOC~ ^R Save File~DOC~ ~FILENAME~~FILENAME~

~INVERT~AUTO-SAVE-MODE`10910859256"n
0m.CAuto-Save-Mode Setup HookIf non-0, called when AUTO-SAVE-MODE is loaded
0m.CBefore Auto Save HookIf non-0 is run just before auto saving
0m.CAfter Auto Save HookIf non-0 is run just after auto saving
0m.CAuto Save Star* If non-0, user wants * in mode line after auto-save
10910859256m.vAUTO-SAVE-MODE Loaded'
[1[2[k
qEMACS Version-152"g
m(m.m& Get Library Pointer)EMACSu2
@:i1|
:i*[0
:fo..qMM 0"l
q2m.m0m.vMM 0w'
|
m1& Auto Save Setup
m1Auto Save Mode
m1^R Save File
m1& Secretary Macro
m1& Auto Save All Buffers
m1& Real-time Interrupt
fg ft
The Auto-Save-Mode library is obsolete.  The standard EMACS auto save
mechanism can provide the same capabilities now.  Please update your init or
   fsOSTeco"e ftEVARS'"#
ftEMACS.VARS' ft file so that it does not load Auto-Save-Mode, and to set the
following variables each to 1:  Auto Save Max, Auto Save Visited File, and
Auto Save All Buffers.  This is being done now so that you can edit in this
EMACS even though Auto-Save-Mode is loaded.  (In other words, loading this has
no other effect than printing this message.)

    1m.vAuto Save Maxw
1m.vAuto Save Visited Filew
1m.vAuto Save All Buffersw
'
m.mKill Variableuk
mkMM & Auto Save Setupw
mkMM Auto Save Modew
mkMM & Auto Save Filew
mkMM ^R Save Filew
mkMM & Secretary Macrow
mkMM & Auto Save All Buffersw
mkMM & Real-time Interruptw
0fo..qExit Hookf"ew :i*'u1
@:i*|ff"e m(m.m& Auto Save All Buffers)'
1|m.vExit Hookw
qAuto-Save-Mode Setup Hookf"nu1 m1'
"#w
m.m& Secretary Macrof(u.f)u..f
m.m& Real-time InterruptfsClkMacrow
fsClkInterval"e 4*60*60fsClkIntervalw'
m.m^R Save Fileu:.x()'
qAuto Save Default"e
0uAuto Save Mode0'
qBuffer Filenamesf"ew
0uAuto Save Mode0'f[DFile
fsDVersion"e 1'# 0'f(uAuto Save Mode)J[1
 ff"g "e 0uAuto Save Mode 1fsModeChangew''
 qBuffer Filenamesu1
 q1"e :i*Buffer has no filenamesfsErr'
 q1f[DFile
 fsDVersion"n @ft
Version number not zero, save anyway
	       1m(m.m& Yes or No)"e ''
 1uAuto Save Mode
 ff"e qAuto Save Interval'"# 'f(fs^RMDlyw)fs^RMCntw
 1fsModeChangew9[1[2[3[4 0f[VB 0f[VZ
-qBuffer Index"e qBuffer filenamesu1'
"# q:.b(+2)u1'
q1"e @ftNo auto save filenames.  0fsEchoActivew '

 q1f[DFile
fsURead"n e[fne]'
1:< 1,er fsIFileu3 fsIFVersionu4 fsIFCDateu2 ec
q2-(0fo..qASav 3 File)"e
q4fsDVersionw
fsDFileu1
etASAVE OUTPUT'
>w
qBefore Auto Save Hookf"nu2 m2'w
fsUWrite"n e\fne^'
ei fsOFCDateu2
hp ef1
fsOFileu1
q2u:.b(+8)
q2m.vASav 1 Filew
@ftAuto saved: 1

qAfter Auto Save Hookf"nu1 m1'w
0fsXModifiedw
qAuto Save Star"e 0fsModifiedw'
0fsEchoActivew 2-16:"l m(m.m& Auto Save All Buffers)w 1'
 :i*CfsEchoDis
ff"g
fsXModified"e @ft(No changes need to be written)
    0fsEchoActivew 1'
@ft(auto save)

qBuffer Indexm(m.m& Auto Save File)
1'
[1[2[3[4 f[DFile
0f[VB 0f[VZ
qBuffer Filenamesf"ew :i*No filenames to save underfsErr
    'u1
et1
q1u2
fsURead"n e[fne]'
1:< 1,er fsIFileu2 fsIFVersionu3 fsIFCDateu4 ec
q4-(0fo..qASav 2 File)"e
q3fsDVersionw
fsDFileu1
etASAVE OUTPUT'
q:.b(qBuffer Index+8)u3
q4"n q3"n q4-q3"n
ftThis file has been written on disk since you last read or wrote it.
Should I write it anyway
        m(m.m& Yes or No)(f 0u..h)"e 0''''
     >w

 fsXModified"e @ft(No changes need to be written)
'
 "# fsUWrite"n e\fne^'
ei fsOFCDateu3
hp ef1
fsOFileu2
q3u:.b(qBuffer Index+8)
@ftUser saved: 2

    0fsXModifiedw'
0fsModifiedw
m(m.mKill Variable)ASav 2 Filew
0fsEchoActivew 1 Bq:.b(qBuffer Index+4)[..o
fsXModified"e 1'
qAuto Save Mode"e 1'
:i*CfsEchoDis @ft(auto save)
 0fsEchoActivew
fs^RMDlyfs^RMCntw
qBuffer Indexm(m.m& Auto Save File)
 1F0[1 [2 -1[3 [..o
< 1f<!Test!
q:.b(q1+4)u..o
fsXModified@;
q1-qBuffer Index"e
qAuto Save Mode@;'
"# q1+9u2
< f~:.b(q2)Auto Save Mode@;
q2+2u2 q1+q:.b(q1)-q2:"g f;Test' >
q:.b(q2+1)@;'
%3"e :i*CfsEchoDis @ft(auto save)
    0fsEchoActivew'
q1m(m.m& Auto Save File)
>
q1+q:.b(q1)u1
q1-(fq.b/5); >
?0fsTyiCount"n 0'
m(m.m& Auto Save All Buffers)
 0@v 0'Obsolete version of Auto Save Mode.rS Install hooks, create variables.
If EMACS Version is greater than 152, EMACS should be able to provide our
functionality and we would be incompatible anyway, so print message, set
variables, and make this library be a no-op.
Otherwise, for users with an older EMACS:
Runs Auto-Save-Mode Setup Hook, if it is non-0, in which case it
must take care of setting keys, fsClkMacro, fsClkInterval, ..F and
.F.  We set those only when there is no hook.
This object file was compressed on 10:45pm  Tuesday, 21 April 1981
by ECC on AI from the following source libraries:

   ECC; DSK: AUTO-S 116,	04/21/81 22:44:424S Decide whether to turn on auto saving for file;C Turn on or off auto saving for this buffer.
NUMARG is number of characters between auto saves.  Default is given by the
    Auto Save Interval option.
NUMARG of 0 turns it off.,S Subroutine that may write out an auto save file.
NUMARG is Buffer Index of buffer in .B to save.
We run Before Auto Save Hook and After Auto Save Hook if non-0.C^R Write out a user-save file if needs it.
A user-save file is one written by user decision, and therefore never to
    be touched by auto saving.  E.g. a high-level backup point.
Declares this version to be a user-saved file, i.e. NOT an auto saved
    one.  Thus, auto saving will not occur to this version again.
Given an explicit NUMARG, we just run & Auto Save File, to ensure that the
    file is currently safe, if not user-level consistent:  thus this will
    keep the file declared an auto save file.
A NUMARG of 16 or greater calls & Auto Save All Buffers.S ..F:  Auto save for use in ^R mode editing.
The buffer is auto saved after every fs^RMDly characters.
Auto saving happens by calling & Auto Save File.S For each buffer that requires it.
I.e. for each that is modified and has Auto Save Mode nonzero
& Auto Save File is called.-S Save file after 5 minutes of idle time.*& Setup AUTO-SAVE-MODE Library
& Auto Save Setup
Auto Save Mode
& Auto Save File
^R Save File
& Secretary Macro
& Auto Save All Buffers
& Real-time Interrupt
\+8+fq(+4)[2 0[3
< %3,-q2f2u3 q3&1@; q3"l 0' >
f[BBind q3-1*5,q3*5g2 q:..o(0)+q2